home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 6 / FM Towns Free Software Collection 6.iso / t_os / vdtwn / tvf / asmhd6 / tw1hd6 / d_main1_.hd6 next >
Text File  |  1993-07-08  |  2KB  |  147 lines
  1. ds_name        db    '\KOMEI\実物\TVF_PRG\MAIN1',0
  2.  
  3.  
  4. paint_wd:
  5.      SET_P dt1
  6.      WD_LEFT
  7.      ret
  8.  
  9. re_paint:
  10. mouse_in:
  11.      ret
  12.  
  13.  
  14. be_called:
  15.  
  16.  
  17.      YOMU eax,300
  18.  
  19.      push ebp
  20.  
  21.      mov ebp,eax
  22.  
  23.       push ds
  24.      push es
  25.  
  26.      mov ax,1ch
  27.      mov ds,ax
  28.      mov es,ax
  29. ;--------------------------------------------------------
  30.  
  31. ;===== draw main1 =====
  32.         align    4
  33. draw_main1:    xor    eax,eax        ;画面クリア
  34.         mov    edi,40000h
  35.         mov    esi,400h-(360*2)
  36.         mov    bl,240
  37.         align    4
  38. #clr:
  39.         mov    bh,360/2/15
  40.         align    4
  41. #clrr:
  42.         REPT    15
  43.         and    [edi],ebp
  44.         add    edi,4
  45.         ENDM
  46.         dec    bh
  47.         jne    short #clrr
  48.         add    edi,esi
  49.         dec    bl
  50.         jne    short #clr
  51.  
  52.      pop es
  53.      pop ds
  54.      mov eax,ebp
  55.      pop ebp
  56.  
  57.      push eax
  58.  
  59.             CALL_P dt1
  60.      pop eax
  61.      push ebp
  62.  
  63.      mov ebp,eax
  64.      push es
  65.      push ds
  66.      mov ax,1ch
  67.      mov ds,ax
  68.      mov es,ax
  69.  
  70.  
  71.         ;call    screen_side_clear
  72.  
  73.         mov    dx,0458h    ;Packed pixel mask register set.
  74.         mov    al,0
  75.         out    dx,al
  76.         mov    dx,045Ah
  77.         mov    ax,bp
  78.         out    dx,ax
  79.         shr    ebp,16
  80.  
  81.         mov    dx,0458h
  82.         mov    al,1
  83.         out    dx,al
  84.         mov    dx,045Ah
  85.         mov    ax,bp
  86.         out    dx,ax
  87.  
  88.         align    4
  89. #repeat1:    mov    esi,20
  90.         mov    edi,40000h+20
  91.         mov    eax,(360-12)*2/4
  92.         mov    ebx,400h-(360-12)*2
  93.         REPT    240
  94.         mov    ecx,eax
  95.         rep    movsd
  96.         add    esi,ebx
  97.         add    edi,ebx
  98.         ENDM
  99.  
  100.         mov    ax,0901h
  101.         int    90h
  102.         xor    dh,0FFh
  103.         je    #repeat1
  104.         push    dx
  105.  
  106.         mov    dx,0458h    ;Packer pixel mask register clear.
  107.         mov    al,0
  108.         out    dx,al
  109.         mov    dx,045Ah
  110.         mov    ax,0FFFFh
  111.         out    dx,ax
  112.         shr    ebp,16
  113.  
  114.         mov    dx,0458h
  115.         mov    al,1
  116.         out    dx,al
  117.         mov    dx,045Ah
  118.         mov    ax,0FFFFh
  119.         out    dx,ax
  120.  
  121.         pop    dx
  122.      pop es
  123.      pop ds
  124.      pop ebp
  125.         ret
  126.  
  127. p_set:
  128.      M_P_SET
  129. p_call:
  130.      M_P_CALL
  131.  
  132. dt1:
  133.      call sub_edi
  134.      dw ?
  135.      db 'S_S_CLS',0
  136.  
  137. look_me:
  138.      call sub_esi
  139.      dd 0,0
  140.      dw     1,0,10,42,10,90,15,1,0,0
  141.  
  142.  
  143.  
  144.  
  145.  
  146.  
  147.